home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EuroCD 3
/
EuroCD 3.iso
/
S
/
MakeAssigns
< prev
Wrap
Text File
|
1998-06-24
|
2KB
|
79 lines
Resident EuroCD-03:C/Assign PURE
Assign EuroCD: EuroCD-03:
cd EuroCD:
If NOT Exists C:ViewMenu
Echo "ViewMenu is not found in your C:"
Echo "ViewMenu is used to view or play files on the EuroCD."
Echo "For more information about ViewMenu, Read the docs"
Echo "on EuroCD."
Ask "Shall I copy ViewMenu to your C: directory? (y/n):"
If WARN
Copy EuroCD:C/ViewMenu C:
EndIf
Echo ""
Echo ""
EndIf
If NOT Exists ENVARC:ViewMenu.Data
Echo "ViewMenu.Data is not found in your ENVARC:"
Echo "ViewMenu.Data is a prefs list for ViewMenu."
Echo "For more information about ViewMenu, Read the docs"
Echo "on EuroCD."
Ask "Shall I copy ViewMenu.Data to your ENVARC: and ENV: directory? (y/n):"
If WARN
Copy EuroCD:Prefs/Env-Archive/ViewMenu.Data ENVARC:
Copy EuroCD:Prefs/Env-Archive/ViewMenu.Data ENV:
EndIf
Echo ""
Echo ""
EndIf
Assign Help: EuroCD:Locale/Help
Assign C: EuroCD:C add
Assign Devs: EuroCD:Devs add
Assign Fonts: EuroCD:Fonts add
Assign L: EuroCD:L add
Assign Libs: EuroCD:Libs add
Assign S: EuroCD:S add
Assign Sys: EuroCD: add
Assign Classes: EuroCD:Classes add
Assign Locale: EuroCD:Locale add
Assign Prefs: EuroCD:Prefs add
Assign Keymaps: EuroCD:Devs/Keymaps add
Assign Printers: EuroCD:Devs/Printers add
Assign Rexx: EuroCD:Rexx add
Assign Rexx: EuroCD:S add
Assign Datatypes: EuroCD:Devs/Datatypes add
Assign Catalogs: EuroCD:Catalogs add
Assign Catalogs: EuroCD:Locale/Catalogs add
Assign Help: EuroCD:Locale/Help add
Copy EuroCD:Prefs/ENV-Archive/~(#?Viewmenu.data|sys/screenmode.prefs) ENV: all quiet
Copy >NIL: ENVARC:~(#?sys/screenmode.prefs|sys/palette.prefs|sys/wbconfig.prefs) ENV: all quiet
C:Mount >NIL: EuroCD:Devs/DosDrivers/~(#?.info)
If Exists EuroCD:Devs/Monitors
If Exists EuroCD:Devs/Monitors/VGAOnly
EuroCD:Devs/Monitors/VGAOnly
EndIf
C:List >NIL: EuroCD:Devs/Monitors/~(#?.info|VGAOnly) To T:M LFORMAT "EuroCD:Devs/Monitors/%s"
Execute T:M
C:Delete >NIL: T:M
EndIf
C:AddDataTypes REFRESH QUIET
If Exists EuroCD:s/ExtraStartup
Execute EuroCD:s/ExtraStartup
EndIf
Resident Assign REMOVE